<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-comment">-- | Generating C symbol names emitted by the compiler.</span><span>
</span><span id="line-2"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">GHC.CmmToAsm.CPrim</span><span>
</span><span id="line-3"></span><span>    </span><span class="hs-special">(</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicReadLabel"><span class="hs-identifier">atomicReadLabel</span></a></span><span>
</span><span id="line-4"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicWriteLabel"><span class="hs-identifier">atomicWriteLabel</span></a></span><span>
</span><span id="line-5"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicRMWLabel"><span class="hs-identifier">atomicRMWLabel</span></a></span><span>
</span><span id="line-6"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#cmpxchgLabel"><span class="hs-identifier">cmpxchgLabel</span></a></span><span>
</span><span id="line-7"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#xchgLabel"><span class="hs-identifier">xchgLabel</span></a></span><span>
</span><span id="line-8"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#popCntLabel"><span class="hs-identifier">popCntLabel</span></a></span><span>
</span><span id="line-9"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#pdepLabel"><span class="hs-identifier">pdepLabel</span></a></span><span>
</span><span id="line-10"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#pextLabel"><span class="hs-identifier">pextLabel</span></a></span><span>
</span><span id="line-11"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#bSwapLabel"><span class="hs-identifier">bSwapLabel</span></a></span><span>
</span><span id="line-12"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#bRevLabel"><span class="hs-identifier">bRevLabel</span></a></span><span>
</span><span id="line-13"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#clzLabel"><span class="hs-identifier">clzLabel</span></a></span><span>
</span><span id="line-14"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#ctzLabel"><span class="hs-identifier">ctzLabel</span></a></span><span>
</span><span id="line-15"></span><span>    </span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#word2FloatLabel"><span class="hs-identifier">word2FloatLabel</span></a></span><span>
</span><span id="line-16"></span><span>    </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-17"></span><span>
</span><span id="line-18"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Prelude.html"><span class="hs-identifier">GHC.Prelude</span></a></span><span>
</span><span id="line-19"></span><span>
</span><span id="line-20"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html"><span class="hs-identifier">GHC.Cmm.Type</span></a></span><span>
</span><span id="line-21"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Cmm.MachOp.html"><span class="hs-identifier">GHC.Cmm.MachOp</span></a></span><span>
</span><span id="line-22"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html"><span class="hs-identifier">GHC.Utils.Outputable</span></a></span><span>
</span><span id="line-23"></span><span>
</span><span id="line-24"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#popCntLabel"><span class="hs-identifier hs-type">popCntLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-25"></span><span id="popCntLabel"><span class="annot"><span class="annottext">popCntLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#popCntLabel"><span class="hs-identifier hs-var hs-var">popCntLabel</span></a></span></span><span> </span><span id="local-6989586621680944633"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944633"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_popcnt&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944632"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944633"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-26"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-27"></span><span>    </span><span id="local-6989586621680944632"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944632"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-28"></span><span>    </span><span class="annot"><a href="#local-6989586621680944632"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-29"></span><span>    </span><span class="annot"><a href="#local-6989586621680944632"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-30"></span><span>    </span><span class="annot"><a href="#local-6989586621680944632"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-31"></span><span>    </span><span class="annot"><a href="#local-6989586621680944632"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944623"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944623"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;popCntLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944623"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-32"></span><span>
</span><span id="line-33"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#pdepLabel"><span class="hs-identifier hs-type">pdepLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-34"></span><span id="pdepLabel"><span class="annot"><span class="annottext">pdepLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#pdepLabel"><span class="hs-identifier hs-var hs-var">pdepLabel</span></a></span></span><span> </span><span id="local-6989586621680944620"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944620"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_pdep&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944619"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944620"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-35"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-36"></span><span>    </span><span id="local-6989586621680944619"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944619"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-37"></span><span>    </span><span class="annot"><a href="#local-6989586621680944619"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-38"></span><span>    </span><span class="annot"><a href="#local-6989586621680944619"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-39"></span><span>    </span><span class="annot"><a href="#local-6989586621680944619"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-40"></span><span>    </span><span class="annot"><a href="#local-6989586621680944619"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944615"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944615"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;pdepLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944615"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-41"></span><span>
</span><span id="line-42"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#pextLabel"><span class="hs-identifier hs-type">pextLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-43"></span><span id="pextLabel"><span class="annot"><span class="annottext">pextLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#pextLabel"><span class="hs-identifier hs-var hs-var">pextLabel</span></a></span></span><span> </span><span id="local-6989586621680944614"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944614"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_pext&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944613"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944614"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-44"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-45"></span><span>    </span><span id="local-6989586621680944613"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944613"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-46"></span><span>    </span><span class="annot"><a href="#local-6989586621680944613"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-47"></span><span>    </span><span class="annot"><a href="#local-6989586621680944613"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-48"></span><span>    </span><span class="annot"><a href="#local-6989586621680944613"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-49"></span><span>    </span><span class="annot"><a href="#local-6989586621680944613"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944609"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944609"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;pextLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944609"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-50"></span><span>
</span><span id="line-51"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#bSwapLabel"><span class="hs-identifier hs-type">bSwapLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-52"></span><span id="bSwapLabel"><span class="annot"><span class="annottext">bSwapLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#bSwapLabel"><span class="hs-identifier hs-var hs-var">bSwapLabel</span></a></span></span><span> </span><span id="local-6989586621680944608"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944608"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_bswap&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944607"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944608"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-53"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-54"></span><span>    </span><span id="local-6989586621680944607"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944607"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-55"></span><span>    </span><span class="annot"><a href="#local-6989586621680944607"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-56"></span><span>    </span><span class="annot"><a href="#local-6989586621680944607"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-57"></span><span>    </span><span class="annot"><a href="#local-6989586621680944607"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944603"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944603"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;bSwapLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944603"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-58"></span><span>
</span><span id="line-59"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#bRevLabel"><span class="hs-identifier hs-type">bRevLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-60"></span><span id="bRevLabel"><span class="annot"><span class="annottext">bRevLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#bRevLabel"><span class="hs-identifier hs-var hs-var">bRevLabel</span></a></span></span><span> </span><span id="local-6989586621680944602"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944602"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_bitrev&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944601"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944602"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-61"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-62"></span><span>    </span><span id="local-6989586621680944601"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944601"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-63"></span><span>    </span><span class="annot"><a href="#local-6989586621680944601"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-64"></span><span>    </span><span class="annot"><a href="#local-6989586621680944601"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-65"></span><span>    </span><span class="annot"><a href="#local-6989586621680944601"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-66"></span><span>    </span><span class="annot"><a href="#local-6989586621680944601"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944597"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944597"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;bRevLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944597"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-67"></span><span>
</span><span id="line-68"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#clzLabel"><span class="hs-identifier hs-type">clzLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-69"></span><span id="clzLabel"><span class="annot"><span class="annottext">clzLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#clzLabel"><span class="hs-identifier hs-var hs-var">clzLabel</span></a></span></span><span> </span><span id="local-6989586621680944596"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944596"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_clz&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944595"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944596"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-70"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-71"></span><span>    </span><span id="local-6989586621680944595"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944595"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-72"></span><span>    </span><span class="annot"><a href="#local-6989586621680944595"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-73"></span><span>    </span><span class="annot"><a href="#local-6989586621680944595"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-74"></span><span>    </span><span class="annot"><a href="#local-6989586621680944595"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-75"></span><span>    </span><span class="annot"><a href="#local-6989586621680944595"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944591"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944591"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;clzLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944591"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-76"></span><span>
</span><span id="line-77"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#ctzLabel"><span class="hs-identifier hs-type">ctzLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-78"></span><span id="ctzLabel"><span class="annot"><span class="annottext">ctzLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#ctzLabel"><span class="hs-identifier hs-var hs-var">ctzLabel</span></a></span></span><span> </span><span id="local-6989586621680944590"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944590"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_ctz&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944589"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944590"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-79"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-80"></span><span>    </span><span id="local-6989586621680944589"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944589"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-81"></span><span>    </span><span class="annot"><a href="#local-6989586621680944589"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-82"></span><span>    </span><span class="annot"><a href="#local-6989586621680944589"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-83"></span><span>    </span><span class="annot"><a href="#local-6989586621680944589"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-84"></span><span>    </span><span class="annot"><a href="#local-6989586621680944589"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944585"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944585"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ctzLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944585"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-85"></span><span>
</span><span id="line-86"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#word2FloatLabel"><span class="hs-identifier hs-type">word2FloatLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-87"></span><span id="word2FloatLabel"><span class="annot"><span class="annottext">word2FloatLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#word2FloatLabel"><span class="hs-identifier hs-var hs-var">word2FloatLabel</span></a></span></span><span> </span><span id="local-6989586621680944584"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944584"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_word2float&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944583"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944584"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-88"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-89"></span><span>    </span><span id="local-6989586621680944583"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944583"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-90"></span><span>    </span><span class="annot"><a href="#local-6989586621680944583"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-91"></span><span>    </span><span class="annot"><a href="#local-6989586621680944583"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944579"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944579"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;word2FloatLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944579"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-92"></span><span>
</span><span id="line-93"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicRMWLabel"><span class="hs-identifier hs-type">atomicRMWLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Cmm.MachOp.html#AtomicMachOp"><span class="hs-identifier hs-type">AtomicMachOp</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-94"></span><span id="atomicRMWLabel"><span class="annot"><span class="annottext">atomicRMWLabel :: Width -&gt; AtomicMachOp -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#atomicRMWLabel"><span class="hs-identifier hs-var hs-var">atomicRMWLabel</span></a></span></span><span> </span><span id="local-6989586621680944578"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944578"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span id="local-6989586621680944577"><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="#local-6989586621680944577"><span class="hs-identifier hs-var">amop</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_atomic_&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp -&gt; String
</span><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="#local-6989586621680944577"><span class="hs-identifier hs-var">amop</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944575"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944578"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-95"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-96"></span><span>    </span><span id="local-6989586621680944575"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944575"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-97"></span><span>    </span><span class="annot"><a href="#local-6989586621680944575"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-98"></span><span>    </span><span class="annot"><a href="#local-6989586621680944575"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-99"></span><span>    </span><span class="annot"><a href="#local-6989586621680944575"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-100"></span><span>    </span><span class="annot"><a href="#local-6989586621680944575"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944571"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944571"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;atomicRMWLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944571"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-101"></span><span>
</span><span id="line-102"></span><span>    </span><span id="local-6989586621680944576"><span class="annot"><span class="annottext">pprFunName :: AtomicMachOp -&gt; String
</span><a href="#local-6989586621680944576"><span class="hs-identifier hs-var hs-var">pprFunName</span></a></span></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_Add"><span class="hs-identifier hs-var">AMO_Add</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;add&quot;</span></span><span>
</span><span id="line-103"></span><span>    </span><span class="annot"><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_Sub"><span class="hs-identifier hs-var">AMO_Sub</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;sub&quot;</span></span><span>
</span><span id="line-104"></span><span>    </span><span class="annot"><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_And"><span class="hs-identifier hs-var">AMO_And</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;and&quot;</span></span><span>
</span><span id="line-105"></span><span>    </span><span class="annot"><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_Nand"><span class="hs-identifier hs-var">AMO_Nand</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;nand&quot;</span></span><span>
</span><span id="line-106"></span><span>    </span><span class="annot"><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_Or"><span class="hs-identifier hs-var">AMO_Or</span></a></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;or&quot;</span></span><span>
</span><span id="line-107"></span><span>    </span><span class="annot"><a href="#local-6989586621680944576"><span class="hs-identifier hs-var">pprFunName</span></a></span><span> </span><span class="annot"><span class="annottext">AtomicMachOp
</span><a href="GHC.Cmm.MachOp.html#AMO_Xor"><span class="hs-identifier hs-var">AMO_Xor</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;xor&quot;</span></span><span>
</span><span id="line-108"></span><span>
</span><span id="line-109"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#xchgLabel"><span class="hs-identifier hs-type">xchgLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-110"></span><span id="xchgLabel"><span class="annot"><span class="annottext">xchgLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#xchgLabel"><span class="hs-identifier hs-var hs-var">xchgLabel</span></a></span></span><span> </span><span id="local-6989586621680944564"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944564"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_xchg&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944563"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944564"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-111"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-112"></span><span>    </span><span id="local-6989586621680944563"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944563"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-113"></span><span>    </span><span class="annot"><a href="#local-6989586621680944563"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-114"></span><span>    </span><span class="annot"><a href="#local-6989586621680944563"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-115"></span><span>    </span><span class="annot"><a href="#local-6989586621680944563"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-116"></span><span>    </span><span class="annot"><a href="#local-6989586621680944563"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944559"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944559"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;xchgLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944559"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-117"></span><span>
</span><span id="line-118"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#cmpxchgLabel"><span class="hs-identifier hs-type">cmpxchgLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-119"></span><span id="cmpxchgLabel"><span class="annot"><span class="annottext">cmpxchgLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#cmpxchgLabel"><span class="hs-identifier hs-var hs-var">cmpxchgLabel</span></a></span></span><span> </span><span id="local-6989586621680944558"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944558"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_cmpxchg&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944557"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944558"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-120"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-121"></span><span>    </span><span id="local-6989586621680944557"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944557"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-122"></span><span>    </span><span class="annot"><a href="#local-6989586621680944557"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-123"></span><span>    </span><span class="annot"><a href="#local-6989586621680944557"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-124"></span><span>    </span><span class="annot"><a href="#local-6989586621680944557"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-125"></span><span>    </span><span class="annot"><a href="#local-6989586621680944557"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944553"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944553"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;cmpxchgLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944553"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-126"></span><span>
</span><span id="line-127"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicReadLabel"><span class="hs-identifier hs-type">atomicReadLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-128"></span><span id="atomicReadLabel"><span class="annot"><span class="annottext">atomicReadLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#atomicReadLabel"><span class="hs-identifier hs-var hs-var">atomicReadLabel</span></a></span></span><span> </span><span id="local-6989586621680944552"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944552"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_atomicread&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944551"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944552"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-129"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-130"></span><span>    </span><span id="local-6989586621680944551"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944551"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-131"></span><span>    </span><span class="annot"><a href="#local-6989586621680944551"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-132"></span><span>    </span><span class="annot"><a href="#local-6989586621680944551"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-133"></span><span>    </span><span class="annot"><a href="#local-6989586621680944551"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-134"></span><span>    </span><span class="annot"><a href="#local-6989586621680944551"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944547"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944547"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;atomicReadLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944547"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-135"></span><span>
</span><span id="line-136"></span><span class="annot"><a href="GHC.CmmToAsm.CPrim.html#atomicWriteLabel"><span class="hs-identifier hs-type">atomicWriteLabel</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Cmm.Type.html#Width"><span class="hs-identifier hs-type">Width</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="../../base/src/GHC.Base.html#String"><span class="hs-identifier hs-type">String</span></a></span><span>
</span><span id="line-137"></span><span id="atomicWriteLabel"><span class="annot"><span class="annottext">atomicWriteLabel :: Width -&gt; String
</span><a href="GHC.CmmToAsm.CPrim.html#atomicWriteLabel"><span class="hs-identifier hs-var hs-var">atomicWriteLabel</span></a></span></span><span> </span><span id="local-6989586621680944546"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944546"><span class="hs-identifier hs-var">w</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;hs_atomicwrite&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
forall a. [a] -&gt; [a] -&gt; [a]
</span><a href="../../base/src/GHC.Base.html#%2B%2B"><span class="hs-operator hs-var">++</span></a></span><span> </span><span class="annot"><span class="annottext">Width -&gt; String
</span><a href="#local-6989586621680944545"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944546"><span class="hs-identifier hs-var">w</span></a></span><span>
</span><span id="line-138"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-139"></span><span>    </span><span id="local-6989586621680944545"><span class="annot"><span class="annottext">pprWidth :: Width -&gt; String
</span><a href="#local-6989586621680944545"><span class="hs-identifier hs-var hs-var">pprWidth</span></a></span></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W8"><span class="hs-identifier hs-var">W8</span></a></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;8&quot;</span></span><span>
</span><span id="line-140"></span><span>    </span><span class="annot"><a href="#local-6989586621680944545"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W16"><span class="hs-identifier hs-var">W16</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;16&quot;</span></span><span>
</span><span id="line-141"></span><span>    </span><span class="annot"><a href="#local-6989586621680944545"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W32"><span class="hs-identifier hs-var">W32</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;32&quot;</span></span><span>
</span><span id="line-142"></span><span>    </span><span class="annot"><a href="#local-6989586621680944545"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="GHC.Cmm.Type.html#W64"><span class="hs-identifier hs-var">W64</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;64&quot;</span></span><span>
</span><span id="line-143"></span><span>    </span><span class="annot"><a href="#local-6989586621680944545"><span class="hs-identifier hs-var">pprWidth</span></a></span><span> </span><span id="local-6989586621680944541"><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944541"><span class="hs-identifier hs-var">w</span></a></span></span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc -&gt; String
forall a. HasCallStack =&gt; String -&gt; SDoc -&gt; a
</span><a href="GHC.Utils.Outputable.html#pprPanic"><span class="hs-identifier hs-var">pprPanic</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;atomicWriteLabel: Unsupported word width &quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Width -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Width
</span><a href="#local-6989586621680944541"><span class="hs-identifier hs-var">w</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-144"></span></pre></body></html>